home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 November / macformat-018.iso / Demos / Extend 3.0 Demo / Demo Libraries / Demo Generic Lib / Demo Generic Lib.rsrc / MODL_9508_Help < prev    next >
Encoding:
Text File  |  1994-06-22  |  1.3 KB  |  44 lines
  1. **    This block is for documenting your model.
  2. **    Copyright © 1990-1994 by Imagine That, Inc.
  3. **    All Rights Reserved.
  4. **    Extend Generic Library, Help block; Pat Diamond    2/8/90
  5. **                modified:
  6. **                        1/1/92 JSL Modified for V2.0
  7. **                        2/14/94 DJK modified report
  8. **                        3/10/94 DJK added block label to report 
  9.  
  10.  
  11. ** This message occurs for each step in the simulation.
  12. on simulate
  13. {
  14.     beep();
  15. }
  16.  
  17.  
  18. ** Initialize any simulation variables.
  19. on initsim
  20. {
  21.     getSimulateMsgs(FALSE);
  22. }
  23.  
  24.  
  25. on endSim
  26. {
  27.     ** sysGlobal1 is the file reference number for the TEXT REPORT
  28.     if( sysGlobal1 != 0.0 )  ** 0 is error, check for open file for REPORT
  29.         {
  30. // template for report:      |BLOCK NAME *****************|block number |BLOCK NUMBER*******
  31.         fileWrite(sysGlobal1,"Help                         block number "+MyBlockNumber(),"",True);
  32.         if(getBlockLabel(myBlockNumber()) != "")
  33.             fileWrite(sysGlobal1,"Block Label: "+getBlockLabel(myBlockNumber()),"",True);
  34.         if( comments1 != "" )
  35.             fileWrite(sysGlobal1,"     "+comments1,"",True);        
  36.         if( comments2 != "" )
  37.             fileWrite(sysGlobal1,"     "+comments2,"",True);        
  38.         if( comments3 != "" )
  39.             fileWrite(sysGlobal1,"     "+comments3,"",True);        
  40.         if( comments4 != "" )
  41.             fileWrite(sysGlobal1,"     "+comments4,"",True);        
  42.         fileWrite(sysGlobal1," ","",True);
  43.         }
  44. }